/ Turnbull China Bikeride / Turnbull China Bikeride - Disc 2.iso / BARNET / INTERNET / ACORNET / ACORN-ST / ACRNET21 / !AcornetA_AppLib_freeuser

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 01 0e f4 3e 66 72 | 65 65 75 73 65 72 0d 00 |.....>fr|eeuser..|
|00000010| 02 04 0d 00 03 14 dd 20 | a4 66 72 65 65 75 73 65 |....... |.freeuse|
|00000020| 72 5f 69 6e 69 74 0d 00 | 04 06 3d 30 0d 00 05 04 |r_init..|..=0....|
|00000030| 0d 00 06 29 dd 20 a4 66 | 72 65 65 75 73 65 72 5f |...). .f|reeuser_|
|00000040| 6d 65 74 68 6f 64 28 6d | 65 74 68 6f 64 24 2c 61 |method(m|ethod$,a|
|00000050| 72 67 24 2c 6f 70 74 24 | 29 0d 00 07 10 c8 8e 20 |rg$,opt$|)...... |
|00000060| 6d 65 74 68 6f 64 24 20 | ca 0d 00 08 29 c9 20 22 |method$ |....). "|
|00000070| 63 6f 6e 66 69 67 22 3a | 20 3d c3 20 a4 66 72 65 |config":| =. .fre|
|00000080| 65 75 73 65 72 5f 63 6f | 6e 66 69 67 28 61 72 67 |euser_co|nfig(arg|
|00000090| 24 29 0d 00 09 10 c9 20 | 22 75 70 67 72 61 64 65 |$)..... |"upgrade|
|000000a0| 22 3a 0d 00 0a 24 20 20 | f4 20 75 73 65 72 27 73 |":...$  |. user's|
|000000b0| 20 73 74 75 66 66 20 2d | 20 6e 6f 74 68 69 6e 67 | stuff -| nothing|
|000000c0| 20 74 6f 20 64 6f 0d 00 | 0b 0a 20 20 3d 22 31 22 | to do..|..  ="1"|
|000000d0| 0d 00 0c 05 cb 0d 00 0d | 07 3d 22 22 0d 00 0e 04 |........|.=""....|
|000000e0| 0d 00 0f 1c dd 20 a4 66 | 72 65 65 75 73 65 72 5f |..... .f|reeuser_|
|000000f0| 63 6f 6e 66 69 67 28 64 | 69 72 24 29 0d 00 10 15 |config(d|ir$)....|
|00000100| ea 20 6c 69 6e 65 24 2c | 6c 6f 77 24 2c 6d 74 75 |. line$,|low$,mtu|
|00000110| 24 0d 00 11 16 66 72 65 | 65 75 73 65 72 5f 64 69 |$....fre|euser_di|
|00000120| 72 24 3d 64 69 72 24 0d | 00 12 21 f2 75 70 64 61 |r$=dir$.|..!.upda|
|00000130| 74 65 5f 6f 70 65 6e 28 | 64 69 72 24 2b 22 2e 53 |te_open(|dir$+".S|
|00000140| 74 61 72 74 75 70 22 29 | 0d 00 13 1a c8 95 20 a4 |tartup")|...... .|
|00000150| 75 70 64 61 74 65 5f 72 | 65 61 64 28 6c 69 6e 65 |update_r|ead(line|
|00000160| 24 29 0d 00 14 1b 20 20 | 6c 6f 77 24 3d a4 73 74 |$)....  |low$=.st|
|00000170| 72 6c 6f 77 65 72 28 6c | 69 6e 65 24 29 0d 00 15 |rlower(l|ine$)...|
|00000180| 47 20 20 e7 20 c0 6c 6f | 77 24 2c 35 29 3d 22 72 |G  . .lo|w$,5)="r|
|00000190| 6d 72 75 6e 22 20 80 20 | 28 a7 6c 6f 77 24 2c 22 |mrun" . |(.low$,"|
|000001a0| 73 6c 69 70 64 72 69 76 | 65 72 22 29 20 84 20 a7 |slipdriv|er") . .|
|000001b0| 6c 6f 77 24 2c 22 70 70 | 70 64 72 69 76 65 72 22 |low$,"pp|pdriver"|
|000001c0| 29 29 20 8c 0d 00 16 25 | 20 20 20 20 e7 20 6e 65 |)) ....%|    . ne|
|000001d0| 74 5f 6c 69 6e 6b 5f 70 | 72 6f 74 6f 63 6f 6c 24 |t_link_p|rotocol$|
|000001e0| 3d 22 53 4c 49 50 22 20 | 8c 0d 00 17 2d 20 20 20 |="SLIP" |....-   |
|000001f0| 20 20 20 6d 74 75 24 3d | 6e 65 74 5f 6d 74 75 24 |   mtu$=|net_mtu$|
|00000200| 3a 20 e7 20 6d 74 75 24 | 3d 22 22 20 6d 74 75 24 |: . mtu$|="" mtu$|
|00000210| 3d 22 35 37 36 22 0d 00 | 18 38 20 20 20 20 20 20 |="576"..|.8      |
|00000220| 6c 69 6e 65 24 3d 22 52 | 6d 52 75 6e 20 46 72 65 |line$="R|mRun Fre|
|00000230| 65 4e 65 74 3a 44 72 69 | 76 65 72 73 2e 53 4c 49 |eNet:Dri|vers.SLI|
|00000240| 50 64 72 69 76 65 72 20 | 22 2b 6d 74 75 24 0d 00 |Pdriver |"+mtu$..|
|00000250| 19 09 20 20 20 20 cc 0d | 00 1a 36 20 20 20 20 20 |..    ..|..6     |
|00000260| 20 6c 69 6e 65 24 3d 22 | 52 6d 52 75 6e 20 46 72 | line$="|RmRun Fr|
|00000270| 65 65 4e 65 74 3a 44 72 | 69 76 65 72 73 2e 50 50 |eeNet:Dr|ivers.PP|
|00000280| 50 64 72 69 76 65 72 20 | 31 35 30 30 22 0d 00 1b |Pdriver |1500"...|
|00000290| 09 20 20 20 20 cd 0d 00 | 1c 07 20 20 cd 0d 00 1d |.    ...|..  ....|
|000002a0| 4a 20 20 e7 20 c0 6c 6f | 77 24 2c 31 37 29 3d 22 |J  . .lo|w$,17)="|
|000002b0| 73 65 74 20 69 6e 65 74 | 24 68 6f 73 74 6e 61 6d |set inet|$hostnam|
|000002c0| 65 22 20 6c 69 6e 65 24 | 3d 22 53 65 74 20 49 6e |e" line$|="Set In|
|000002d0| 65 74 24 48 6f 73 74 4e | 61 6d 65 20 22 2b 6e 65 |et$HostN|ame "+ne|
|000002e0| 74 5f 6e 6f 64 65 24 0d | 00 1e 34 20 20 e7 20 c0 |t_node$.|..4  . .|
|000002f0| 6c 6f 77 24 2c 38 29 3d | 22 73 6c 61 74 74 61 63 |low$,8)=|"slattac|
|00000300| 68 22 20 84 20 c0 6c 6f | 77 24 2c 39 29 3d 22 7c |h" . .lo|w$,9)="||
|00000310| 73 6c 61 74 74 61 63 68 | 22 20 8c 0d 00 1f 4b 20 |slattach|" ....K |
|00000320| 20 20 20 6c 69 6e 65 24 | 3d 22 7c 20 73 6c 61 74 |   line$|="| slat|
|00000330| 74 61 63 68 20 22 2b 6e | 65 74 5f 73 65 72 69 61 |tach "+n|et_seria|
|00000340| 6c 5f 64 72 69 76 65 72 | 24 2b 22 20 22 2b 6e 65 |l_driver|$+" "+ne|
|00000350| 74 5f 70 6f 72 74 24 2b | 22 20 22 2b 6e 65 74 5f |t_port$+|" "+net_|
|00000360| 73 70 65 65 64 24 0d 00 | 20 36 20 20 20 20 e7 20 |speed$..| 6    . |
|00000370| c0 6e 65 74 5f 6c 69 6e | 6b 5f 70 72 6f 74 6f 63 |.net_lin|k_protoc|
|00000380| 6f 6c 24 2c 33 29 3d 22 | 50 50 50 22 20 6c 69 6e |ol$,3)="|PPP" lin|
|00000390| 65 24 3d 22 7c 22 2b 6c | 69 6e 65 24 0d 00 21 07 |e$="|"+l|ine$..!.|
|000003a0| 20 20 cd 0d 00 22 1a 20 | 20 f2 75 70 64 61 74 65 |  ...". | .update|
|000003b0| 5f 77 72 69 74 65 28 6c | 69 6e 65 24 29 0d 00 23 |_write(l|ine$)..#|
|000003c0| 05 ce 0d 00 24 11 f2 75 | 70 64 61 74 65 5f 63 6c |....$..u|pdate_cl|
|000003d0| 6f 73 65 0d 00 25 29 f2 | 66 69 6c 65 5f 73 65 74 |ose..%).|file_set|
|000003e0| 74 79 70 65 28 64 69 72 | 24 2b 22 2e 53 74 61 72 |type(dir|$+".Star|
|000003f0| 74 75 70 22 2c 22 4f 62 | 65 79 22 29 0d 00 26 28 |tup","Ob|ey")..&(|
|00000400| 69 25 3d a4 64 6c 67 5f | 70 6f 6c 6c 3a 20 e7 20 |i%=.dlg_|poll: . |
|00000410| 69 25 3c 3e 64 6c 67 5f | 4e 55 4c 4c 20 8c 20 3d |i%<>dlg_|NULL . =|
|00000420| 69 25 3d 31 0d 00 27 22 | f2 75 70 64 61 74 65 5f |i%=1..'"|.update_|
|00000430| 6f 70 65 6e 28 64 69 72 | 24 2b 22 2e 53 68 75 74 |open(dir|$+".Shut|
|00000440| 64 6f 77 6e 22 29 0d 00 | 28 1a c8 95 20 a4 75 70 |down")..|(... .up|
|00000450| 64 61 74 65 5f 72 65 61 | 64 28 6c 69 6e 65 24 29 |date_rea|d(line$)|
|00000460| 0d 00 29 1b 20 20 6c 6f | 77 24 3d a4 73 74 72 6c |..).  lo|w$=.strl|
|00000470| 6f 77 65 72 28 6c 69 6e | 65 24 29 0d 00 2a 48 20 |ower(lin|e$)..*H |
|00000480| 20 e7 20 c0 6c 6f 77 24 | 2c 36 29 3d 22 72 6d 6b | . .low$|,6)="rmk|
|00000490| 69 6c 6c 22 20 80 20 28 | a7 6c 6f 77 24 2c 22 73 |ill" . (|.low$,"s|
|000004a0| 6c 69 70 64 72 69 76 65 | 72 22 29 20 84 20 a7 6c |lipdrive|r") . .l|
|000004b0| 6f 77 24 2c 22 70 70 70 | 64 72 69 76 65 72 22 29 |ow$,"ppp|driver")|
|000004c0| 29 20 8c 0d 00 2b 5a 20 | 20 20 20 e7 20 6e 65 74 |) ...+Z |   . net|
|000004d0| 5f 6c 69 6e 6b 5f 70 72 | 6f 74 6f 63 6f 6c 24 3d |_link_pr|otocol$=|
|000004e0| 22 53 4c 49 50 22 20 8c | 20 6c 69 6e 65 24 3d 22 |"SLIP" .| line$="|
|000004f0| 52 4d 4b 69 6c 6c 20 53 | 4c 49 50 64 72 69 76 65 |RMKill S|LIPdrive|
|00000500| 72 22 20 8b 20 6c 69 6e | 65 24 3d 22 52 4d 4b 69 |r" . lin|e$="RMKi|
|00000510| 6c 6c 20 50 50 50 64 72 | 69 76 65 72 22 0d 00 2c |ll PPPdr|iver"..,|
|00000520| 07 20 20 cd 0d 00 2d 1a | 20 20 f2 75 70 64 61 74 |.  ...-.|  .updat|
|00000530| 65 5f 77 72 69 74 65 28 | 6c 69 6e 65 24 29 0d 00 |e_write(|line$)..|
|00000540| 2e 05 ce 0d 00 2f 11 f2 | 75 70 64 61 74 65 5f 63 |...../..|update_c|
|00000550| 6c 6f 73 65 0d 00 30 28 | 69 25 3d a4 64 6c 67 5f |lose..0(|i%=.dlg_|
|00000560| 70 6f 6c 6c 3a 20 e7 20 | 69 25 3c 3e 64 6c 67 5f |poll: . |i%<>dlg_|
|00000570| 4e 55 4c 4c 20 8c 20 3d | 69 25 3d 31 0d 00 31 27 |NULL . =|i%=1..1'|
|00000580| f2 75 70 64 61 74 65 5f | 6f 70 65 6e 28 64 69 72 |.update_|open(dir|
|00000590| 24 2b 22 2e 46 69 6c 65 | 73 2e 72 65 73 63 6f 6e |$+".File|s.rescon|
|000005a0| 66 22 29 0d 00 32 1a c8 | 95 20 a4 75 70 64 61 74 |f")..2..|. .updat|
|000005b0| 65 5f 72 65 61 64 28 6c | 69 6e 65 24 29 0d 00 33 |e_read(l|ine$)..3|
|000005c0| 3a 20 20 e7 20 c0 6c 69 | 6e 65 24 2c 36 29 3d 22 |:  . .li|ne$,6)="|
|000005d0| 73 65 61 72 63 68 22 20 | 6c 69 6e 65 24 3d 22 73 |search" |line$="s|
|000005e0| 65 61 72 63 68 20 20 20 | 20 20 22 2b 6e 65 74 5f |earch   |  "+net_|
|000005f0| 64 6f 6d 61 69 6e 24 0d | 00 34 41 20 20 e7 20 c0 |domain$.|.4A  . .|
|00000600| 6c 69 6e 65 24 2c 39 29 | 3d 22 63 61 63 68 65 6c |line$,9)|="cachel|
|00000610| 6f 61 64 22 20 6c 69 6e | 65 24 3d 22 63 61 63 68 |oad" lin|e$="cach|
|00000620| 65 6c 6f 61 64 20 20 72 | 65 73 62 6f 6f 74 20 72 |eload  r|esboot r|
|00000630| 65 73 63 61 63 68 65 22 | 0d 00 35 35 20 20 e7 20 |escache"|..55  . |
|00000640| c0 6c 69 6e 65 24 2c 31 | 30 29 3c 3e 22 6e 61 6d |.line$,1|0)<>"nam|
|00000650| 65 73 65 72 76 65 72 22 | 20 f2 75 70 64 61 74 65 |eserver"| .update|
|00000660| 5f 77 72 69 74 65 28 6c | 69 6e 65 24 29 0d 00 36 |_write(l|ine$)..6|
|00000670| 05 ce 0d 00 37 32 f2 75 | 70 64 61 74 65 5f 77 72 |....72.u|pdate_wr|
|00000680| 69 74 65 28 22 6e 61 6d | 65 73 65 72 76 65 72 20 |ite("nam|eserver |
|00000690| 22 2b 6e 65 74 5f 6e 61 | 6d 65 5f 73 65 72 76 65 |"+net_na|me_serve|
|000006a0| 72 31 24 29 0d 00 38 49 | e7 20 6e 65 74 5f 6e 61 |r1$)..8I|. net_na|
|000006b0| 6d 65 5f 73 65 72 76 65 | 72 32 24 3e 22 22 20 f2 |me_serve|r2$>"" .|
|000006c0| 75 70 64 61 74 65 5f 77 | 72 69 74 65 28 22 6e 61 |update_w|rite("na|
|000006d0| 6d 65 73 65 72 76 65 72 | 20 22 2b 6e 65 74 5f 6e |meserver| "+net_n|
|000006e0| 61 6d 65 5f 73 65 72 76 | 65 72 32 24 29 0d 00 39 |ame_serv|er2$)..9|
|000006f0| 49 e7 20 6e 65 74 5f 6e | 61 6d 65 5f 73 65 72 76 |I. net_n|ame_serv|
|00000700| 65 72 33 24 3e 22 22 20 | f2 75 70 64 61 74 65 5f |er3$>"" |.update_|
|00000710| 77 72 69 74 65 28 22 6e | 61 6d 65 73 65 72 76 65 |write("n|ameserve|
|00000720| 72 20 22 2b 6e 65 74 5f | 6e 61 6d 65 5f 73 65 72 |r "+net_|name_ser|
|00000730| 76 65 72 33 24 29 0d 00 | 3a 11 f2 75 70 64 61 74 |ver3$)..|:..updat|
|00000740| 65 5f 63 6c 6f 73 65 0d | 00 3b 06 3d 31 0d ff    |e_close.|.;.=1.. |
+--------+-------------------------+-------------------------+--------+--------+